home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 43
/
Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso
/
-serious-
/
graphics
/
fxforge
/
distortfx
/
radar
< prev
next >
Wrap
Text File
|
1999-06-15
|
1KB
|
32 lines
Category: UnPlugged
Title: UnPlugged Radar...
Copyright: ©1997/1998 Martijn W. van der Lee. UnPlugged site: http://members.xoom.com/rambo
Author: Martijn W. van der Lee (mwvdlee@open.net)
Filename: radar.8bf
R:put((m%(ctl(6)*X/255)==0)||((d+128)%256==0)||(x==X/2)||(y==Y/2),0),((c2d(r2x(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)),r2y(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)))*63/(256-ctl(1))+(r*ctl(2)/63))*ctl(3)/255)+(get(0)*(ctl(7)*2)*ctl(3)/255)
G:((c2d(r2x(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)),r2y(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)))*63/(256-ctl(1))+(g*ctl(2)/63))*ctl(4)/255)+(get(0)*(ctl(7)*2)*ctl(4)/255)
B:((c2d(r2x(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)),r2y(c2d(x-X/2,y-Y/2)+(255-ctl(0)*4),c2m(x-X/2,y-Y/2)))*63/(256-ctl(1))+(b*ctl(2)/63))*ctl(5)/255)+(get(0)*(ctl(7)*2)*ctl(5)/255)
A:a
ctl[0]: Beam angle:
ctl[1]: Beam brightness:
ctl[2]: Signal brightness:
ctl[3]: Red level:
ctl[4]: Green level:
ctl[5]: Blue level:
ctl[6]: Line density:
ctl[7]: Line intensity:
val[0]: 100
val[1]: 69
val[2]: 32
val[3]: 255
val[4]: 255
val[5]: 0
val[6]: 4
val[7]: 64